home *** CD-ROM | disk | FTP | other *** search
/ Gekikoh Dennoh Club 5 / Gekikoh Dennoh Club Vol. 5 (Japan).7z / Gekikoh Dennoh Club Vol. 5 (Japan) (Track 01).bin / games / kenka / kenka2s.lzh / han_m.has < prev    next >
Encoding:
Text File  |  1998-08-24  |  3.9 KB  |  207 lines
  1. *---------------------------------------
  2. *
  3. *    ânâôâRü[ê┌ô«
  4. *
  5. *    by Shiroh Nakaya
  6. *
  7. *---------------------------------------
  8.  
  9.     .cpu    68000
  10.  
  11.     .include    OSU.H
  12.  
  13.     .xdef    han_init
  14.     .xref    pcg_data
  15.     .xref    pal_data
  16.     .xref    adpcm_data
  17.  
  18.     .text
  19.     .even
  20. *---------------------------------------
  21. *    ânâôâRü[Åëè·ë╗
  22. *
  23. han_init:
  24.     move.w    #6,C_H_X(a1)
  25.     move.w    #40,C_H_Y(a1)
  26.     move.w    #12,C_HD_X(a1)
  27.     move.w    #76,C_HD_Y(a1)
  28.     move.w    #40,C_MD_X1(a1)
  29.     move.w    #248,C_MD_X2(a1)
  30.     move.w    #48,C_MD_Y1(a1)
  31.     move.w    #224,C_MD_Y2(a1)
  32.     move.w    #6,C_SA_F(a1)
  33.     move.w    #5,C_SSA_F(a1)
  34.     move.l    #han_motion,C_A_DT(a1)
  35.     move.l    #han_display,C_PCG_D(a1)
  36.     move.l    #han_move_data,C_JOY(a1)
  37.     move.l    #han_attack_data,C_HIT_D(a1)
  38.     move.l    #han_se_data,C_PCM_D(a1)
  39.  
  40.     move.w    #$0000,BG_CTRL            * âXâvâëâCâgò\Īénéeée
  41.     lea.l    pcg_data,a4
  42.     adda.l    #HAN,a4
  43.  
  44.     movea.l    a2,a6
  45.     move.w    #2304-1,d1
  46. @@:
  47.     move.l    (a4)+,(a2)+
  48.     dbra    d1,@b
  49.     adda.l    #15744,a6
  50.     move.w    #160-1,d1
  51. @@:
  52.     move.l    (a4)+,(a6)+
  53.     dbra    d1,@b
  54.  
  55.     move.w    C_COL(a1),d1
  56.     add.w    d1,d1
  57.     add.w    d1,d1
  58.     lea.l    han_palette,a4
  59.     movea.l    0(a4,d1.w),a4
  60.     move.w    #8-1,d1
  61. @@:
  62.     move.l    (a4)+,(a3)+
  63.     dbra    d1,@b
  64.  
  65.     move.w    #$0200,BG_CTRL            * âXâvâëâCâgò\Īéném
  66.     rts
  67. *---------------------------------------
  68. *    ânâôâRü[ò\Ī
  69. *
  70. han_display:
  71.     move.w    C_M_F(a1),d0
  72.     add.w    d0,d0
  73.     move.w    display_tbl(pc,d0.w),d0
  74.     jmp    display_tbl(pc,d0.w)
  75. *---------------------------------------
  76.     .even
  77. display_tbl:
  78.     .dc.w    han_n-display_tbl,han_attack-display_tbl
  79.     .dc.w    han_hit-display_tbl,han_win-display_tbl,han_g-display_tbl
  80.     .dc.w    han_attack-display_tbl,han_g-display_tbl
  81. *---------------------------------------
  82. han_attack:
  83.     move.w    C_AK_F(a1),d0
  84.     add.w    d0,d0
  85.     move.w    attack_tbl(pc,d0.w),d0
  86.     jmp    attack_tbl(pc,d0.w)
  87. *---------------------------------------
  88.     .even
  89. attack_tbl:
  90.     .dc.w    low-attack_tbl
  91.     .dc.w    mid-attack_tbl
  92.     .dc.w    high-attack_tbl
  93.     .dc.w    0
  94.     .dc.w    han_ssa-attack_tbl
  95. *---------------------------------------
  96.     .include    han_n.inc
  97. *---------------------------------------
  98.     .include    han_al.inc
  99. *---------------------------------------
  100.     .include    han_am.inc
  101. *---------------------------------------
  102.     .include    han_ah.inc
  103. *---------------------------------------
  104.     .include    han_ssa.inc
  105. *---------------------------------------
  106.     .include    han_h.inc
  107. *---------------------------------------
  108.     .include    han_w.inc
  109. *---------------------------------------
  110.     .include    han_g.inc
  111. *---------------------------------------
  112. han_motion:
  113.     .dc.w    0,0,15
  114.     .dc.w    0,0,25
  115.     .dc.w    0,0,35
  116.     .dc.w    15,24,0
  117.     .dc.w    0,0,40
  118. han_attack_data:
  119.     .dc.w    16,-16,4,8,8,16,10,$0500,1,10
  120.     .dc.w    4,-16,4,8,8,16,25,$0500,2,15
  121.     .dc.w    0,-16,4,8,8,16,50,$0500,2,20
  122.     .dc.w    0,0,8,8,16,16,30,0,2,20
  123.     .dc.w    0,0,4,8,8,16,70,$0500,2,40
  124. han_move_data:
  125.     .dc.w     0, 0
  126.     .dc.w     0,-1
  127.     .dc.w     0, 1
  128.     .dc.w     0, 0
  129.     .dc.w    -1, 0
  130.     .dc.w    -1,-1
  131.     .dc.w    -1, 1
  132.     .dc.w     0, 0
  133.     .dc.w     1, 0
  134.     .dc.w     1,-1
  135.     .dc.w     1, 1
  136. han_se_data:
  137.     .dc.l    0                * ÄπìUîéÄnô«é`écéoébél
  138.     .dc.l    0
  139.     .dc.w    0
  140.     .dc.l    0                * ÆåìUîéÄnô«é`écéoébél
  141.     .dc.l    0
  142.     .dc.w    0
  143.     .dc.l    0                * ï¡ìUîéÄnô«é`écéoébél
  144.     .dc.l    0
  145.     .dc.w    0
  146.     .dc.l    adpcm_data+GRID
  147.     .dc.w    $b908
  148.     .dc.w    2612
  149.     .dc.w    1
  150.     .dc.l    0
  151.     .dc.l    0
  152.     .dc.w    0
  153.  
  154.     .dc.l    adpcm_data+BUO
  155.     .dc.w    $f908
  156.     .dc.w    942
  157.     .dc.w    0
  158.     .dc.l    adpcm_data+BUO
  159.     .dc.w    $f908
  160.     .dc.w    942
  161.     .dc.w    0
  162.     .dc.l    adpcm_data+HAN02
  163.     .dc.w    $f904
  164.     .dc.w    942
  165.     .dc.w    1
  166.     .dc.l    0
  167.     .dc.l    0
  168.     .dc.w    0
  169.     .dc.l    adpcm_data+HAN02
  170.     .dc.w    $f904
  171.     .dc.w    942
  172.     .dc.w    1
  173.  
  174.     .dc.l    adpcm_data+DOSHU
  175.     .dc.w    $f908
  176.     .dc.w    1186
  177.     .dc.w    2
  178.     .dc.l    adpcm_data+DOSHU
  179.     .dc.w    $f904
  180.     .dc.w    1186
  181.     .dc.w    3
  182.     .dc.l    adpcm_data+DOSHU
  183.     .dc.w    $f904
  184.     .dc.w    1186
  185.     .dc.w    3
  186.     .dc.l    adpcm_data+DOSHU
  187.     .dc.w    $f904
  188.     .dc.w    1186
  189.     .dc.w    3
  190.     .dc.l    adpcm_data+HAN04
  191.     .dc.w    $f908
  192.     .dc.w    1044
  193.     .dc.w    3
  194.  
  195.     .dc.l    adpcm_data+HAN01        * éjéné`écéoébél
  196.     .dc.w    $f908
  197.     .dc.w    3400
  198.     .dc.w    4
  199.  
  200.     .dc.l    adpcm_data+HAN03        * Åƒé┐é`écéoébél
  201.     .dc.w    2336
  202.  
  203. han_palette:
  204.     .dc.l    pal_data+HAN_C,pal_data+HAN_C+32
  205. *---------------------------------------
  206.     .end
  207.